#!/usr/bin/perl -w
use Modern::Perl;

print sort {lc($a) cmp lc($b)} <>;
